﻿Public Partial Class Login
    Inherits System.Web.UI.Page

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

    End Sub

    Protected Sub ButtonLogin_Click(ByVal sender As Object, ByVal e As EventArgs) Handles ButtonLogin.Click
        'Crear variables de sesion
        If Me.TextBoxUsuario.Text <> "" Then
            Session.Add("Usuario", Me.TextBoxUsuario.Text) 'Agrego un nuevo objeto de sesion a la coleccion de objetos de sesion
        End If
        Response.Redirect("Inicio.aspx") 'Redirecciono el explorador web a la nueva pagina
    End Sub
End Class